program SmallStruct5;

uses
  Forms,
  Dialogs,
  SysUtils,
  MidasLib,
  App.Action.Default in 'Action\Default\App.Action.Default.pas',
  App.Action.TAppCustomeAction in 'Action\Default\App.Action.TAppCustomeAction.pas',
  App.Action.TAppDefaultActionViewLoadAction in 'Action\Default\App.Action.TAppDefaultActionViewLoadAction.pas',
  App.Action.TAppDefaultActionViewOpenAction in 'Action\Default\App.Action.TAppDefaultActionViewOpenAction.pas',
  App.Action.TAppDefaultAppendAction in 'Action\Default\App.Action.TAppDefaultAppendAction.pas',
  App.Action.TAppDefaultChildActionViewOpenAction in 'Action\Default\App.Action.TAppDefaultChildActionViewOpenAction.pas',
  App.Action.TAppDefaultChooseActionViewOpenAction in 'Action\Default\App.Action.TAppDefaultChooseActionViewOpenAction.pas',
  App.Action.TAppDefaultDeleteAction in 'Action\Default\App.Action.TAppDefaultDeleteAction.pas',
  App.Action.TAppDefaultEditAction in 'Action\Default\App.Action.TAppDefaultEditAction.pas',
  App.Action.TAppDefaultGridExportExcelAction in 'Action\Default\App.Action.TAppDefaultGridExportExcelAction.pas',
  App.Action.TAppDefaultNextAction in 'Action\Default\App.Action.TAppDefaultNextAction.pas',
  App.Action.TAppDefaultPriorAction in 'Action\Default\App.Action.TAppDefaultPriorAction.pas',
  App.Action.TAppDefaultRefreshAction in 'Action\Default\App.Action.TAppDefaultRefreshAction.pas',
  App.Action.TAppDefaultSaveAction in 'Action\Default\App.Action.TAppDefaultSaveAction.pas',
  App.Form.TAppMainForm in 'Form\App.Form.TAppMainForm.pas' {AppMainForm},
  App.Imp.TAppClassTableLoaderImp in 'Imp\App.Imp.TAppClassTableLoaderImp.pas',
  App.Imp.TAppConfigurationLoaderImp in 'Imp\App.Imp.TAppConfigurationLoaderImp.pas',
  App.Imp.TAppSystemObjectImp in 'Imp\App.Imp.TAppSystemObjectImp.pas',
  App.Imp.TAppSystemObjectImp2 in 'Imp\App.Imp.TAppSystemObjectImp2.pas',
  App.View.Application.TAppMainView in 'View\Application\App.View.Application.TAppMainView.pas' {AppMainView: TFrame},
  SmallStruct.Action in '..\Core\S5\Action\SmallStruct.Action.pas',
  SmallStruct.Action.TSSAction in '..\Core\S5\Action\SmallStruct.Action.TSSAction.pas',
  SmallStruct.Action.TSSActionFactory in '..\Core\S5\Action\SmallStruct.Action.TSSActionFactory.pas',
  SmallStruct.ActionView in '..\Core\S5\ActionView\SmallStruct.ActionView.pas',
  SmallStruct.ActionView.TSSActionButton in '..\Core\S5\ActionView\SmallStruct.ActionView.TSSActionButton.pas' {SSActionButton: TFrame},
  SmallStruct.ActionView.TSSActionPanel in '..\Core\S5\ActionView\SmallStruct.ActionView.TSSActionPanel.pas' {SSActionPanel: TFrame},
  SmallStruct.ActionView.TSSActionView in '..\Core\S5\ActionView\SmallStruct.ActionView.TSSActionView.pas' {SSActionView: TFrame},
  SmallStruct.ActionView.TSSActionViewFactory in '..\Core\S5\ActionView\SmallStruct.ActionView.TSSActionViewFactory.pas',
  SmallStruct.BusinessObject in '..\Core\S5\BusinessObject\SmallStruct.BusinessObject.pas',
  SmallStruct.BusinessObject.TSSAdvancedBusinessObject in '..\Core\S5\BusinessObject\SmallStruct.BusinessObject.TSSAdvancedBusinessObject.pas',
  SmallStruct.BusinessObject.TSSBusinessObject in '..\Core\S5\BusinessObject\SmallStruct.BusinessObject.TSSBusinessObject.pas',
  SmallStruct.BusinessObject.TSSBusinessObjectFactory in '..\Core\S5\BusinessObject\SmallStruct.BusinessObject.TSSBusinessObjectFactory.pas',
  SmallStruct.BusinessObject.TSSScriptBusinessObject in '..\Core\S5\BusinessObject\SmallStruct.BusinessObject.TSSScriptBusinessObject.pas',
  SmallStruct.Configuration in '..\Core\S5\Configuration\SmallStruct.Configuration.pas',
  SmallStruct.Configuration.TSSActionConfiguration in '..\Core\S5\Configuration\SmallStruct.Configuration.TSSActionConfiguration.pas',
  SmallStruct.Configuration.TSSActionViewConfiguration in '..\Core\S5\Configuration\SmallStruct.Configuration.TSSActionViewConfiguration.pas',
  SmallStruct.Configuration.TSSBusinessObjectConfiguration in '..\Core\S5\Configuration\SmallStruct.Configuration.TSSBusinessObjectConfiguration.pas',
  SmallStruct.Configuration.TSSConfiguration in '..\Core\S5\Configuration\SmallStruct.Configuration.TSSConfiguration.pas',
  SmallStruct.Configuration.TSSConfigurationTable in '..\Core\S5\Configuration\SmallStruct.Configuration.TSSConfigurationTable.pas',
  SmallStruct.Configuration.TSSDatabaseConnectionConfiguration in '..\Core\S5\Configuration\SmallStruct.Configuration.TSSDatabaseConnectionConfiguration.pas',
  SmallStruct.Configuration.TSSModelConfiguration in '..\Core\S5\Configuration\SmallStruct.Configuration.TSSModelConfiguration.pas',
  SmallStruct.Configuration.TSSViewConfiguration in '..\Core\S5\Configuration\SmallStruct.Configuration.TSSViewConfiguration.pas',
  SmallStruct.Configuration.TSSViewExtendConfiguration in '..\Core\S5\Configuration\SmallStruct.Configuration.TSSViewExtendConfiguration.pas',
  SmallStruct.Controller in '..\Core\S5\Controller\SmallStruct.Controller.pas',
  SmallStruct.Controller.TSSController in '..\Core\S5\Controller\SmallStruct.Controller.TSSController.pas' {SSController: TFrame},
  SmallStruct.Controller.TSSControllerNavigator in '..\Core\S5\Controller\SmallStruct.Controller.TSSControllerNavigator.pas' {SSControllerNavigator: TFrame},
  SmallStruct.Core in '..\Core\S5\Core\SmallStruct.Core.pas',
  SmallStruct.Core.TSSClassTable in '..\Core\S5\Core\SmallStruct.Core.TSSClassTable.pas',
  SmallStruct.Core.TSSObject in '..\Core\S5\Core\SmallStruct.Core.TSSObject.pas',
  SmallStruct.Core.TSSObjectContainer in '..\Core\S5\Core\SmallStruct.Core.TSSObjectContainer.pas',
  SmallStruct.Core.TSSObjectContext in '..\Core\S5\Core\SmallStruct.Core.TSSObjectContext.pas',
  SmallStruct.Core.TSSObjectFactory in '..\Core\S5\Core\SmallStruct.Core.TSSObjectFactory.pas',
  SmallStruct.Core.TSSRuntimeObject in '..\Core\S5\Core\SmallStruct.Core.TSSRuntimeObject.pas',
  SmallStruct.Core.TSSSystemObject in '..\Core\S5\Core\SmallStruct.Core.TSSSystemObject.pas',
  SmallStruct.Database in '..\Core\S5\Database\SmallStruct.Database.pas',
  SmallStruct.Database.TSSADODatabaseDriver in '..\Core\S5\Database\SmallStruct.Database.TSSADODatabaseDriver.pas',
  SmallStruct.Database.TSSDBXDatabaseDriver in '..\Core\S5\Database\SmallStruct.Database.TSSDBXDatabaseDriver.pas',
  SmallStruct.Database.TSSDataSet in '..\Core\S5\Database\SmallStruct.Database.TSSDataSet.pas',
  SmallStruct.Database.TSSDatabaseConnectionFactory in '..\Core\S5\Database\SmallStruct.Database.TSSDatabaseConnectionFactory.pas',
  SmallStruct.Database.TSSDatabaseDriver in '..\Core\S5\Database\SmallStruct.Database.TSSDatabaseDriver.pas',
  SmallStruct.Error in '..\Core\S5\Error\SmallStruct.Error.pas',
  SmallStruct.Form in '..\Core\S5\Form\SmallStruct.Form.pas',
  SmallStruct.Form.TSSConfirm1MessageDialog in '..\Core\S5\Form\SmallStruct.Form.TSSConfirm1MessageDialog.pas' {SSConfirm1MessageDialog},
  SmallStruct.Form.TSSConfirmMessageDialog in '..\Core\S5\Form\SmallStruct.Form.TSSConfirmMessageDialog.pas' {SSConfirmMessageDialog},
  SmallStruct.Form.TSSDialog in '..\Core\S5\Form\SmallStruct.Form.TSSDialog.pas' {SSDialog},
  SmallStruct.Form.TSSErrorMessageDialog in '..\Core\S5\Form\SmallStruct.Form.TSSErrorMessageDialog.pas' {SSErrorMessageDialog},
  SmallStruct.Form.TSSForm in '..\Core\S5\Form\SmallStruct.Form.TSSForm.pas' {SSForm},
  SmallStruct.Form.TSSFrame in '..\Core\S5\Form\SmallStruct.Form.TSSFrame.pas' {SSFrame: TFrame},
  SmallStruct.Form.TSSMessageDialog in '..\Core\S5\Form\SmallStruct.Form.TSSMessageDialog.pas' {SSMessageDialog},
  SmallStruct.Form.TSSMessager in '..\Core\S5\Form\SmallStruct.Form.TSSMessager.pas',
  SmallStruct.Form.TSSPanel in '..\Core\S5\Form\SmallStruct.Form.TSSPanel.pas' {SSPanel: TFrame},
  SmallStruct.Model in '..\Core\S5\Model\SmallStruct.Model.pas',
  SmallStruct.Model.TSSADODataModel in '..\Core\S5\Model\SmallStruct.Model.TSSADODataModel.pas',
  SmallStruct.Model.TSSDBXDataModel in '..\Core\S5\Model\SmallStruct.Model.TSSDBXDataModel.pas',
  SmallStruct.Model.TSSDataModel in '..\Core\S5\Model\SmallStruct.Model.TSSDataModel.pas',
  SmallStruct.Model.TSSDynamicModel in '..\Core\S5\Model\SmallStruct.Model.TSSDynamicModel.pas',
  SmallStruct.Model.TSSModel in '..\Core\S5\Model\SmallStruct.Model.TSSModel.pas',
  SmallStruct.Model.TSSModelFactory in '..\Core\S5\Model\SmallStruct.Model.TSSModelFactory.pas',
  SmallStruct.Resource in '..\Core\S5\Resource\SmallStruct.Resource.pas',
  SmallStruct.Resource.TSSResource in '..\Core\S5\Resource\SmallStruct.Resource.TSSResource.pas',
  SmallStruct.Resource.TSSResourceRegisterTable in '..\Core\S5\Resource\SmallStruct.Resource.TSSResourceRegisterTable.pas',
  SmallStruct.Resource.TSSResourceTable in '..\Core\S5\Resource\SmallStruct.Resource.TSSResourceTable.pas',
  SmallStruct.Script in '..\Core\S5\Script\SmallStruct.Script.pas',
  SmallStruct.Script.ScriptObject in '..\Core\S5\Script\SmallStruct.Script.ScriptObject.pas',
  SmallStruct.Script.TSSScript in '..\Core\S5\Script\SmallStruct.Script.TSSScript.pas',
  SmallStruct.Tools in '..\Core\S5\Tools\SmallStruct.Tools.pas',
  SmallStruct.View in '..\Core\S5\View\SmallStruct.View.pas',
  SmallStruct.View.TSSChartView in '..\Core\S5\View\SmallStruct.View.TSSChartView.pas' {SSChartView: TFrame},
  SmallStruct.View.TSSDataFormView in '..\Core\S5\View\SmallStruct.View.TSSDataFormView.pas' {SSDataFormView: TFrame},
  SmallStruct.View.TSSDataGridView in '..\Core\S5\View\SmallStruct.View.TSSDataGridView.pas' {SSDataGridView: TFrame},
  SmallStruct.View.TSSDataView in '..\Core\S5\View\SmallStruct.View.TSSDataView.pas' {SSDataView: TFrame},
  SmallStruct.View.TSSView in '..\Core\S5\View\SmallStruct.View.TSSView.pas' {SSView: TFrame},
  SmallStruct.View.TSSViewFactory in '..\Core\S5\View\SmallStruct.View.TSSViewFactory.pas';

{$R *.res}

var
  SystemObject: TAppSystemObjectImp2;
  ObjectContext: TSSObjectContext;

begin
  Application.Initialize;

  SystemObject := TAppSystemObjectImp2.Create(nil);
  SystemObject.InitObject;

  ObjectContext := TSSObjectContext.Create(nil);
  ObjectContext.GetParameter.AppendObject('SYSTEM_OBJECT', SystemObject);

  Application.CreateForm(TAppMainForm, AppMainForm);
  Application.CreateForm(TSSChartView, SSChartView);
  AppMainForm.SetContext(ObjectContext);
  AppMainForm.InitObject;

  Application.Run;
end.
